		 **************************************************************
		 **															 **
		 ** Paper: Freedom of Foreign Movement and Human Trafficking **
		 **														     **
		 ** Authors: Sam R. Bell & Richard W. Frank 				 **
		 **															 **
		 ** Date: May 12, 2021										 **
		 **															 **
		 ** Task: Table A2-Results with domestic freedom of movem.	 **
		 **															 **
		 **************************************************************
		  
								 
		clear
		version 16.1
		set seed 1234

		** Change working directory
		cd "~"
		 
		use "ht_merged.dta"
		merge 1:1 ccode year using "ht_eba_ivs.dta"			
 		global IVs "gdp_ln pop_ln " 
 
 				
			*** 1. CIRI, 12km
			
			probit F.source dm W_dm_con12   $IVs , robust cluster (ccode) 
				
				tab year if e(sample)
				codebook ccode if e(sample)	
				estat ic
				estimates store T4_1
			
			** 2. CIRI interaction, 12km
			
			probit F.source dm W_dm_con12  interact_W_C_d12 $IVs , robust cluster (ccode) 
				
				tab year if e(sample)
				codebook ccode if e(sample)	
				estat ic
				estimates store T4_2
 
 
 			* 3. , V-DEM women 12km

			probit F.source v2cldmovew W_vdommovw_con12  $IVs , robust cluster (ccode)
				 		
				tab year if e(sample)
				codebook ccode if e(sample)	
				estat ic
				estimates store T4_3
				
 			* 4. , V-DEM men 12km

			probit F.source v2cldmovem W_vdommovm_con12  $IVs , robust cluster (ccode)
				 		
				tab year if e(sample)
				codebook ccode if e(sample)	
				estat ic
				estimates store T4_4				
				
			
			* 5. Women interaction V-DEM 12km
			
			probit F.source v2cldmovew W_vdommovw_con12 interact_W_Vdw12 $IVs , robust cluster (ccode)
				
				tab year if e(sample)
				codebook ccode if e(sample)	
				estat ic
				estimates store T4_5
				
			* 6. Men interaction V-DEM 12km
			
			probit F.source v2cldmovem W_vdommovm_con12 interact_W_Vdm12 $IVs , robust cluster (ccode)
				
				tab year if e(sample)
				codebook ccode if e(sample)	
				estat ic
				estimates store T4_6
								
 
			 esttab T4_1 T4_2 T4_3 T4_4 T4_5 T4_6 using "tableA2_domesticmove.csv", replace ///
					title(Table A2: domestic movement, probit results) ///
					obslast label se nogaps scalars(N pr2)  star(* 0.05 ** 0.01 *** 0.001)  
